This is METAFONT, WAITS Version 0.3 (preloaded base=plain 84.9.28)  28 SEP 1984 16:44
**\show lcode_;

*lcode_:="/";

*input io[mf,dek]
(IO.MF[MF,DEK]
The letter O
 penpos1(thick,10); penpos2(.1[thin,thick],90-10);=> penpos1(thick,10); penpos2
(.1[thin,thick],90-10);

 penpos3(thick,180+10); penpos4(thin,270-10);=> penpos3(thick,180+10); penpos4(
thin,270-10);

 x1l=w-x3l=curve_sidebar; x2=x4=.5w;=> x1l=w-x3l=curve_sidebar; x2=x4=.5w;

 y1=.49h; y2l=-o; y3=.51h; y4l=h+o;=> y1=.49h; y2l=-o; y3=.51h; y4l=h+o;

 dz1=down; dz2=right; dz3=up; dz4=left;=> dz1=down; dz2=right; dz3=up; dz4=left
;

 penstroke(1,2,3,4,cycle);=> penstroke(1,2,3,4,cycle);

 penlabels(1,2,3,4); endchar;=> penlabels(1,2,3,4); endchar;
[79]
def test_I(expr code,trial_stem,trial_width) ==>end def test_I(expr code,trial_
stem,trial_width) =
Output written on MFPUT.GF[FIG,DEK] (1 character, 1728 bytes).